home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 2 / Amiga Tools 2.iso / tex / macros / packages / amsart.cls < prev    next >
Encoding:
Text File  |  1995-03-15  |  39.1 KB  |  1,094 lines
  1. %% 
  2. %% This is file `amsart.cls', generated 
  3. %% on <1995/2/23> with the docstrip utility (2.2i).
  4. %% 
  5. %% The original source files were:
  6. %% 
  7. %% amsclass.dtx  (with options: `amsart')
  8. %%% ====================================================================
  9. %%%  @LaTeX-file{
  10. %%%     filename        = "amsclass.dtx",
  11. %%%     version         = "1.2b",
  12. %%%     date            = "1995/02/23",
  13. %%%     time            = "10:06:48 EST",
  14. %%%     author          = "American Mathematical Society",
  15. %%%     copyright       = "Copyright (C) 1995 American Mathematical Society,
  16. %%%                        all rights reserved.  Copying of this file is
  17. %%%                        authorized only if either:
  18. %%%                        (1) you make absolutely no changes to your copy,
  19. %%%                        including name; OR
  20. %%%                        (2) if you do make changes, you first rename it
  21. %%%                        to some other name.",
  22. %%%     address         = "American Mathematical Society,
  23. %%%                        Technical Support,
  24. %%%                        Electronic Products and Services,
  25. %%%                        P. O. Box 6248,
  26. %%%                        Providence, RI 02940,
  27. %%%                        USA",
  28. %%%     telephone       = "401-455-4080 or (in the USA and Canada)
  29. %%%                        800-321-4AMS (321-4267)",
  30. %%%     FAX             = "401-331-3842",
  31. %%%     checksum        = "06446 3073 12220 114673",
  32. %%%     email           = "tech-support@math.ams.org (Internet)",
  33. %%%     codetable       = "ISO/ASCII",
  34. %%%     keywords        = "latex, amslatex, ams-latex",
  35. %%%     supported       = "yes",
  36. %%%     abstract        = "This is part of the AMS-\LaTeX{} distribution.
  37. %%%                        It produces output conforming to the style
  38. %%%                        conventions of American Mathematical Society
  39. %%%                        publications.  The file \fn{amsclass.dtx} is
  40. %%%                        converted by the installation procedure
  41. %%%                        into three document classes:
  42. %%%                        \cls{amsart}, \cls{amsproc}, and \cls{amsbook},
  43. %%%                        which are intended, respectively,
  44. %%%                        for articles and books containing mathematical
  45. %%%                        research; both class files will also carry this
  46. %%%                        heading, and the particular class should be
  47. %%%                        determined from the external file name.",
  48. %%%     docstring       = "The checksum field above contains a CRC-16
  49. %%%                        checksum as the first value, followed by the
  50. %%%                        equivalent of the standard UNIX wc (word
  51. %%%                        count) utility output of lines, words, and
  52. %%%                        characters.  This is produced by Robert
  53. %%%                        Solovay's checksum utility.",
  54. %%%  }
  55. %%% ====================================================================
  56. \NeedsTeXFormat{LaTeX2e}
  57. \ProvidesClass{amsart}[1995/02/23 v1.2b]
  58. \def\@tempa#1#2\@nil{\edef\@classname{#1}}
  59. \expandafter\@tempa\@currnamestack{}{}{}\@nil
  60. \ifx\@classname\@empty \edef\@classname{\@currname}\fi
  61. \DeclareOption{a4paper}{\paperheight 297mm\paperwidth 210mm
  62.   \textheight 54.5pc }
  63. \DeclareOption{letterpaper}{\paperheight 11in\paperwidth 8.5in }
  64. \DeclareOption{landscape}{\@tempdima\paperheight
  65.   \paperheight\paperwidth \paperwidth\@tempdima}
  66. \DeclareOption{portrait}{}
  67. \DeclareOption{oneside}{\@twosidefalse \@mparswitchfalse}
  68. \DeclareOption{twoside}{\@twosidetrue  \@mparswitchtrue}
  69. \DeclareOption{draft}{\overfullrule5\p@ }
  70. \DeclareOption{final}{\overfullrule\z@ }
  71. \newif\if@titlepage
  72. \DeclareOption{titlepage}{\@titlepagetrue}
  73. \DeclareOption{notitlepage}{\@titlepagefalse}
  74. \DeclareOption{onecolumn}{\@twocolumnfalse}
  75. \DeclareOption{twocolumn}{\@twocolumntrue}
  76. \DeclareOption{nomath}{%
  77.   \def\numberwithin##1##2{\@ifundefined{c@##1}{\@nocounterr{##1}}{%
  78.     \@ifundefined{c@##2}{\@nocounterr{##2}}{%
  79.     \@addtoreset{##1}{##2}%
  80.     \toks@\@xp\@xp\@xp{\csname the##1\endcsname}%
  81.     \@xp\xdef\csname the##1\endcsname
  82.       {\@xp\@nx\csname the##2\endcsname
  83.        .\the\toks@}}}}
  84. }
  85. \def\mathfrak{needed}
  86. \DeclareOption{noamsfonts}{\let\mathfrak\relax}
  87. \DeclareOption{psamsfonts}{%
  88.   \PassOptionsToPackage{psamsfonts}{amsfonts}%
  89.   \PassOptionsToPackage{cmex10}{amsmath}}
  90. \newif\iftagsleft@
  91. \DeclareOption{leqno}{%
  92.   \tagsleft@true \PassOptionsToPackage{leqno}{amsmath}}
  93. \DeclareOption{reqno}{%
  94.   \tagsleft@false \PassOptionsToPackage{reqno}{amsmath}}
  95. \newif\ifctagsplit@
  96. \DeclareOption{centertags}{%
  97.   \ctagsplit@true \PassOptionsToPackage{centertags}{amsmath}}
  98. \DeclareOption{tbtags}{%
  99.   \ctagsplit@false \PassOptionsToPackage{tbtags}{amsmath}}
  100. \DeclareOption{fleqn}{%
  101.   \def\[{\relax
  102.     \ifmmode\@badmath
  103.     \else
  104.       \begin{trivlist}%
  105.       \@beginparpenalty\predisplaypenalty
  106.       \@endparpenalty\postdisplaypenalty
  107.       \item[]\leavevmode
  108.       \hbox to\linewidth\bgroup$\displaystyle
  109.       \hskip\mathindent\bgroup
  110.     \fi}%
  111.   \def\]{\relax
  112.     \ifmmode
  113.       \egroup \m@th$\hfil \egroup
  114.       \end{trivlist}%
  115.     \else \@badmath
  116.     \fi}%
  117.   \renewenvironment{equation}{%
  118.     \@beginparpenalty\predisplaypenalty
  119.     \@endparpenalty\postdisplaypenalty
  120.     \refstepcounter{equation}%
  121.     \@topsep\abovedisplayskip \trivlist
  122.     \item[]\leavevmode
  123.     \hbox to\linewidth\bgroup\hskip\mathindent$\displaystyle
  124.   }{%
  125.     \m@th$\hfil \displaywidth\linewidth \hbox{\@eqnnum}\egroup
  126.     \endtrivlist
  127.   }%
  128.   \renewenvironment{eqnarray}{%
  129.     \stepcounter{equation}\let\@currentlabel\theequation
  130.     \global\@eqnswtrue \global\@eqcnt\z@ \tabskip\mathindent
  131.     \let\\=\@eqncr \abovedisplayskip\topsep
  132.     \ifvmode \advance\abovedisplayskip\partopsep \fi
  133.     \belowdisplayskip\abovedisplayskip
  134.     \belowdisplayshortskip\abovedisplayskip
  135.     \abovedisplayshortskip\abovedisplayskip
  136.     $$\everycr{}\halign to\linewidth\bgroup
  137.       \hskip\@centering
  138.       $\displaystyle\tabskip\z@skip####\m@th$&%
  139.       \@eqnsel \global\@eqcnt\@ne
  140.       \hfil${}####{}\m@th$\hfil&%
  141.       \global\@eqcnt\tw@
  142.       $\displaystyle ####\m@th$\hfil\tabskip\@centering&%
  143.       \global\@eqcnt\thr@@
  144.       \hbox to \z@\bgroup\hss####\egroup\tabskip\z@skip\cr
  145.     }{%
  146.       \@@eqncr \egroup \global\advance\c@equation\m@ne$$%
  147.       \global\@ignoretrue
  148.     }%
  149.   \newdimen\mathindent \mathindent\leftmargini
  150. }
  151. \newcommand{\@mainsize}{10}
  152. \newcommand{\@ptsize}{0}
  153. \newcommand{\larger}[1][1]{%
  154.   \count@\@currsizeindex \advance\count@#1\relax
  155.   \ifnum\count@<\z@ \count@\z@ \else\ifnum\count@>12 \count@12 \fi\fi
  156.   \ifcase\count@
  157.     \Tiny\or\Tiny\or\tiny\or\SMALL\or\Small\or\small
  158.     \or\normalsize
  159.     \or\large\or\Large\or\LARGE\or\huge\or\Huge\else\Huge
  160.   \fi
  161. }
  162. \newcommand{\smaller}[1][1]{\larger[-#1]}
  163. \def\@adjustvertspacing{%
  164.   \bigskipamount.7\baselineskip plus.7\baselineskip
  165.   \medskipamount\bigskipamount \divide\medskipamount\tw@
  166.   \smallskipamount\medskipamount \divide\smallskipamount\tw@
  167.   \abovedisplayskip\medskipamount
  168.   \belowdisplayskip \abovedisplayskip
  169.   \abovedisplayshortskip\abovedisplayskip
  170.   \advance\abovedisplayshortskip-1\abovedisplayskip
  171.   \belowdisplayshortskip\abovedisplayshortskip
  172.   \advance\belowdisplayshortskip 1\smallskipamount
  173.   \jot\baselineskip \divide\jot 4 \relax
  174. }
  175. \renewcommand\normalsize{\@xsetfontsize\normalsize 6%
  176.   \@adjustvertspacing \let\@listi\@listI}
  177. \newcommand\Tiny{\@xsetfontsize\Tiny 1}
  178. \newcommand\tiny{\@xsetfontsize\tiny 2}
  179. \newcommand\SMALL{\@xsetfontsize\SMALL 3}
  180. \newcommand\Small{\@xsetfontsize\Small 4%
  181.   \@adjustvertspacing
  182.   \def\@listi{\topsep\smallskipamount \parsep\z@skip \itemsep\z@skip}}
  183. \newcommand\small{\@xsetfontsize\small 5\@adjustvertspacing}
  184. \def\footnotesize{\Small}
  185. \def\scriptsize{\SMALL}
  186. \newcommand\large{\@xsetfontsize\large 7\@adjustvertspacing}
  187. \newcommand\Large{\@xsetfontsize\Large 8\@adjustvertspacing}
  188. \newcommand\LARGE{\@xsetfontsize\LARGE 9}
  189. \newcommand\huge{\@xsetfontsize\huge{10}}
  190. \newcommand\Huge{\@xsetfontsize\Huge{11}}
  191. \def\@xsetfontsize#1#2{%
  192.   \chardef\@currsizeindex#2\relax
  193.   \edef\@tempa{\@nx\@setfontsize\@nx#1%
  194.     \@xp\ifcase\@xp\@currsizeindex\@typesizes
  195.       \else{99}{99}\fi}%
  196.   \@tempa
  197. }
  198. \chardef\@currsizeindex=6
  199. \widowpenalty=10000
  200. \clubpenalty=10000
  201. \brokenpenalty=10000
  202. \newdimen\linespacing
  203. \lineskip=1pt \lineskiplimit=1pt
  204. \normallineskip=1pt \normallineskiplimit=1pt
  205. \let\baselinestretch=\@empty
  206. \headheight=5pt \headsep=14pt
  207. \footskip=12pt
  208. \textheight=50.5pc \topskip=10pt
  209. \textwidth=30pc
  210. \columnsep=10pt \columnseprule=0pt
  211. \marginparwidth=90pt
  212. \marginparsep=11pt
  213. \marginparpush=5pt
  214. \AtBeginDocument{\settoheight{\footnotesep}{\footnotesize M$^1$}}
  215. \skip\footins=7pt plus11pt
  216. \skip\@mpfootins=\skip\footins
  217. \fboxsep=3pt \fboxrule=.4pt
  218. \arrayrulewidth=.4pt    \doublerulesep=2pt
  219. \labelsep=5pt           \arraycolsep=\labelsep
  220. \tabcolsep=\labelsep    \tabbingsep=\labelsep
  221. \floatsep=15pt plus 12pt    \dblfloatsep=15pt plus 12pt
  222. \textfloatsep=\floatsep  \dbltextfloatsep=15pt plus 12pt
  223. \intextsep=\floatsep
  224. \@fptop=0pt plus1fil     \@dblfptop=0pt plus1fil
  225. \@fpbot=0pt plus1fil     \@dblfpbot=0pt plus1fil
  226. \@fpsep=8pt plus2fil     \@dblfpsep=8pt plus2fil\relax
  227. \parskip=0pt \relax
  228. \newdimen\normalparindent
  229. \normalparindent=12pt
  230. \parindent=\normalparindent
  231. \partopsep=0pt \relax \parsep=0pt \relax \itemsep=0pt \relax
  232. \@lowpenalty=51         \@medpenalty=151        \@highpenalty=301
  233. \@beginparpenalty=-\@lowpenalty
  234. \@endparpenalty=-\@lowpenalty
  235. \@itempenalty=-\@lowpenalty
  236. \DeclareOption{10pt}{\def\@mainsize{10}\def\@ptsize{0}%
  237.   \def\@typesizes{%
  238.     \or{5}{6}\or{6}{7}\or{7}{8}\or{8}{10}\or{9}{11}%
  239.     \or{10}{12}% normalsize
  240.     \or{\@xipt}{13}\or{\@xiipt}{14}\or{\@xivpt}{17}%
  241.     \or{\@xviipt}{20}\or{\@xxpt}{24}}%
  242.   \normalsize \linespacing=\baselineskip
  243. }
  244. \DeclareOption{11pt}{\def\@mainsize{11}\def\@ptsize{1}%
  245.   \def\@typesizes{%
  246.     \or{6}{7}\or{7}{8}\or{8}{10}\or{9}{11}\or{10}{12}%
  247.     \or{\@xipt}{13}% normalsize
  248.     \or{\@xiipt}{14}\or{\@xivpt}{17}\or{\@xviipt}{20}%
  249.     \or{\@xxpt}{24}\or{\@xxvpt}{30}}%
  250.   \normalsize \linespacing=\baselineskip
  251. }
  252. \DeclareOption{12pt}{\def\@mainsize{12}\def\@ptsize{2}%
  253.   \def\@typesizes{%
  254.     \or{7}{8}\or{8}{10}\or{9}{11}\or{10}{12}\or{\@xipt}{13}%
  255.     \or{\@xiipt}{14}% normalsize
  256.     \or{\@xivpt}{17}\or{\@xviipt}{20}\or{\@xxpt}{24}%
  257.     \or{\@xxvpt}{30}\or{\@xxvpt}{30}}%
  258.   \normalsize \linespacing=\baselineskip
  259. }
  260. \DeclareOption{8pt}{\def\@mainsize{8}\def\@ptsize{8}%
  261.   \def\@typesizes{%
  262.     \or{5}{6}\or{5}{6}\or{5}{6}\or{6}{7}\or{7}{8}%
  263.     \or{8}{10}% normalsize
  264.     \or{9}{11}\or{10}{12}\or{\@xipt}{13}%
  265.     \or{\@xiipt}{14}\or{\@xivpt}{17}}%
  266.   \normalsize \linespacing=\baselineskip
  267. }
  268. \DeclareOption{9pt}{\def\@mainsize{9}\def\@ptsize{9}%
  269.   \def\@typesizes{%
  270.     \or{5}{6}\or{5}{6}\or{6}{7}\or{7}{8}\or{8}{10}%
  271.     \or{9}{11}% normalsize
  272.     \or{10}{12}\or{\@xipt}{13}\or{\@xiipt}{14}%
  273.     \or{\@xivpt}{17}\or{\@xviipt}{20}}%
  274.   \normalsize \linespacing=\baselineskip
  275. }
  276. \def\ps@empty{\let\@mkboth\@gobbletwo
  277.   \let\@oddhead\@empty \let\@evenhead\@empty
  278.   \let\@oddfoot\@empty \let\@evenfoot\@empty
  279.   \global\topskip\normaltopskip}
  280. \def\ps@plain{\ps@empty
  281.   \def\@oddfoot{\normalfont\scriptsize \hfil\thepage\hfil}%
  282.   \let\@evenfoot\@oddfoot}
  283. \def\ps@headings{\ps@empty
  284.   \def\@evenhead{\normalfont\scriptsize
  285.       \rlap{\thepage}\hfil \leftmark{}{}\hfil}%
  286.   \def\@oddhead{\normalfont\scriptsize \hfil
  287.       \rightmark{}{}\hfil \llap{\thepage}}%
  288.   \let\@mkboth\markboth
  289. }
  290. \let\sectionname\@empty
  291. \let\subsectionname\@empty
  292. \let\subsubsectionname\@empty
  293. \def\leftmark{\expandafter\@firstoftwo\topmark{}{}}
  294. \def\rightmark{\expandafter\@secondoftwo\botmark{}{}}
  295. \def\ps@firstpage{\ps@plain
  296.   \def\@oddfoot{\normalfont\scriptsize \hfil\thepage\hfil
  297.      \global\topskip\normaltopskip}%
  298.   \let\@evenfoot\@oddfoot
  299.   \def\@oddhead{\serieslogo@\hss}%
  300.   \let\@evenhead\@oddhead}% in case an article starts on a left-hand page
  301. \long\def\@nilgobble#1\@nil{}
  302. \def\markboth#1#2{%
  303.   \begingroup
  304.     \@temptokena{{#1}{#2}}\xdef\@themark{\the\@temptokena}%
  305.     \mark{\the\@temptokena}%
  306.   \endgroup
  307.   \if@nobreak\ifvmode\nobreak\fi\fi}
  308. \def\ps@myheadings{\ps@headings \let\@mkboth\@gobbletwo}
  309. \newskip\normaltopskip
  310. \normaltopskip=10pt \relax
  311. \let\sectionmark\@gobble
  312. \let\subsectionmark\@gobble
  313. \let\subsubsectionmark\@gobble
  314. \let\paragraphmark\@gobble
  315.  
  316. \DeclareOption{makeidx}{}
  317. \input{amsgen.sty}
  318. \ExecuteOptions{leqno,centertags,letterpaper,portrait,%
  319.   10pt,twoside,onecolumn,final}
  320. \ProcessOptions\relax
  321. \if@compatibility
  322.   \def\@tempa#1{\let\mathfrak\relax
  323.     \RequirePackage{amstex}\relax}\expandafter\@tempa
  324. \else
  325.   \expandafter\@iden
  326. \fi
  327. {% if native mode
  328. \@ifundefined{numberwithin}{\let\@tempa\relax}{\let\@tempa\@gobbletwo}
  329. \@tempa
  330. \RequirePackage{amsmath}\relax
  331. \ifx\relax\mathfrak \@xp\@gobbletwo \else \let\mathfrak\relax \fi
  332. \RequirePackage{amsfonts}\relax
  333. }% end native mode branch
  334. \newcommand{\uppercasenonmath}[1]{\toks@\@emptytoks
  335.   \@xp\@skipmath\@xp\@empty#1$$%
  336.   \edef#1{\@nx\@upprep\the\toks@}%
  337. }
  338. \newcommand{\@upprep}{%
  339.   \spaceskip1.3\fontdimen2\font plus1.3\fontdimen3\font
  340.   \upchars@}
  341. \newcommand{\upchars@}{%
  342.   \def\ss{SS}\def\i{I}\def\j{J}\def\ae{\AE}\def\oe{\OE}%
  343.   \def\o{\O}\def\aa{\AA}\def\l{\L}\def\Mc{M{\scshape c}}}
  344. \newcommand{\@skipmath}{}
  345. \long\def\@skipmath#1$#2${%
  346.   \@xskipmath#1\(\)%
  347.   \@ifnotempty{#2}{\toks@\@xp{\the\toks@$#2$}\@skipmath\@empty}}%
  348. \newcommand{\@xskipmath}{}
  349. \long\def\@xskipmath#1\(#2\){%
  350.   \uppercase{\toks@\@xp\@xp\@xp{\@xp\the\@xp\toks@#1}}%
  351.   \@ifnotempty{#2}{\toks@\@xp{\the\toks@\(#2\)}\@xskipmath\@empty}}%
  352. \newcommand{\today}{%
  353.   \relax\ifcase\month\or
  354.   January\or February\or March\or April\or May\or June\or
  355.   July\or August\or September\or October\or November\or December\fi
  356.   \space\number\day, \number\year}
  357. \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
  358. \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
  359. \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
  360. \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
  361. \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
  362. \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
  363. \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
  364. \renewcommand{\title}[2][]{\gdef\shorttitle{#1}\gdef\@title{#2}}
  365. \edef\title{\@nx\@dblarg
  366.   \@xp\@nx\csname\string\title\endcsname}
  367. \renewcommand{\author}[2][]{%
  368.   \ifx\@empty\authors
  369.     \gdef\shortauthors{#1}\gdef\authors{#2}%
  370.   \else
  371.     \g@addto@macro\shortauthors{\and#1}%
  372.     \g@addto@macro\authors{\and#2}%
  373.   \fi
  374.   \g@addto@macro\addresses{\author{}}%
  375. }
  376. \edef\author{\@nx\@dblarg
  377.   \@xp\@nx\csname\string\author\endcsname}
  378. \let\shortauthors\@empty   \let\authors\@empty
  379. \let\addresses\@empty      \let\thankses\@empty
  380. \newcommand{\address}[2][]{\g@addto@macro\addresses{\address{#1}{#2}}}
  381. \newcommand{\curraddr}[2][]{\g@addto@macro\addresses{\curraddr{#1}{#2}}}
  382. \newcommand{\email}[2][]{\g@addto@macro\addresses{\email{#1}{#2}}}
  383. \renewcommand{\thanks}[1]{\g@addto@macro\thankses{\thanks{#1}}}
  384. \def\enddoc@text{\ifx\@empty\@translators \else\@settranslators\fi
  385.   \ifx\@empty\addresses \else\@setaddresses\fi}
  386. \AtEndDocument{\enddoc@text}
  387. \def\@setaddresses{\par
  388.   \nobreak \begingroup
  389. \footnotesize
  390.   \def\author##1{\nobreak\addvspace\bigskipamount}%
  391.   \def\\{\unskip, \ignorespaces}%
  392.   \interlinepenalty\@M
  393.   \def\address##1##2{\begingroup
  394.     \par\addvspace\bigskipamount\indent
  395.     \@ifnotempty{##1}{(\ignorespaces##1\unskip) }%
  396.     {\scshape\ignorespaces##2}\par\endgroup}%
  397.   \def\curraddr##1##2{\begingroup
  398.     \@ifnotempty{##2}{\nobreak\indent{\itshape Current address}%
  399.       \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
  400.       ##2\par\endgroup}}%
  401.   \def\email##1##2{\begingroup
  402.     \@ifnotempty{##2}{\nobreak\indent{\itshape E-mail address}%
  403.       \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
  404.       \ttfamily##2\par\endgroup}}%
  405.   \addresses
  406.   \endgroup
  407. }
  408. \let\@date\@empty
  409. \def\dedicatory#1{\def\@dedicatory{#1}}
  410. \let\@dedicatory=\@empty
  411. \def\keywords#1{\def\@keywords{#1}}
  412. \let\@keywords=\@empty
  413. \def\subjclass#1{\def\@subjclass{#1}}
  414. \let\@subjclass=\@empty
  415. \def\commby#1{\def\@commby{(Communicated by #1)}}
  416. \let\@commby=\@empty
  417. \def\translator#1{\g@addto@macro\@translators{\and#1}}
  418. \let\@translators=\@empty
  419. \def\@settranslators{\par\begingroup
  420.   \addvspace{6\p@\@plus9\p@}%
  421.   \hbox to\columnwidth{\hss\normalfont\normalsize
  422.     Translated by %
  423.     \andify\@translators \uppercasenonmath\@translators
  424.     \@translators}
  425.   \endgroup
  426. }
  427. \newcommand{\xandlist}[4]{\@andlista{{#1}{#2}{#3}}#4\and\and}
  428. \def\@andlista#1#2\and#3\and{\@andlistc{#2}\@ifnotempty{#3}{%
  429.   \@andlistb#1{#3}}}
  430. \def\@andlistb#1#2#3#4#5\and{%
  431.   \@ifempty{#5}{%
  432.     \@andlistc{#2#4}%
  433.   }{%
  434.     \@andlistc{#1#4}\@andlistb{#1}{#3}{#3}{#5}%
  435.   }}
  436. \let\@andlistc\@iden
  437. \newcommand{\nxandlist}[4]{%
  438.   \def\@andlistc##1{\toks@\@xp{\the\toks@##1}}%
  439.   \toks@{\toks@\@emptytoks \@andlista{{#1}{#2}{#3}}}%
  440.   \the\@xp\toks@#4\and\and
  441.   \edef#4{\the\toks@}%
  442.   \let\@andlistc\@iden}
  443. \newcommand{\andify}{%
  444.   \nxandlist{\unskip, }{\unskip{} and~}{\unskip, and~}}
  445. \def\and{\unskip{ }and \ignorespaces}
  446. \def\maketitle{\par
  447.   \@topnum\z@ % this prevents figures from falling at the top of page 1
  448.   \@setcopyright
  449.   \uppercasenonmath\shorttitle
  450.   \ifx\@empty\shortauthors \let\shortauthors\shorttitle
  451.   \else \andify\shortauthors \uppercasenonmath\shortauthors \fi
  452.   \begingroup
  453.   \@maketitle
  454.   \toks@\@xp{\shortauthors}\@temptokena\@xp{\shorttitle}%
  455.   \edef\@tempa{\@nx\markboth{\the\toks@}{\the\@temptokena}}\@tempa
  456.   \endgroup
  457. \thispagestyle{firstpage}% this sets first page specifications
  458.   \c@footnote\z@
  459.   \def\do##1{\let##1\relax}%
  460.   \do\maketitle \do\@maketitle \do\title \do\@xtitle \do\@title
  461.   \do\author \do\@xauthor \do\address \do\@xaddress
  462.   \do\email \do\@xemail \do\curraddr \do\@xcurraddr
  463. \do\commby \do\@commby
  464.   \do\dedicatory \do\@dedicatory \do\thanks \do\thankses
  465.   \do\keywords \do\@keywords \do\subjclass \do\@subjclass
  466. }
  467. \def\@maketitle{%
  468.   \normalfont\normalsize
  469.   \let\@makefnmark\relax  \let\@thefnmark\relax
  470.   \ifx\@empty\@date\else \@footnotetext{\@setdate}\fi
  471.   \ifx\@empty\@subjclass\else \@footnotetext{\@setsubjclass}\fi
  472.   \ifx\@empty\@keywords\else \@footnotetext{\@setkeywords}\fi
  473.   \ifx\@empty\thankses\else \@footnotetext{%
  474.     \def\par{\let\par\@par}\@setthanks}\fi
  475.   \@mkboth{\@nx\shortauthors}{\@nx\shorttitle}%
  476.   \global\topskip42\p@\relax % 5.5pc   "   "   "     "     "
  477.   \@settitle
  478.   \ifx\@empty\authors \else \@setauthors \fi
  479.   \ifx\@empty\@dedicatory
  480.   \else
  481.     \baselineskip18\p@
  482.     \vtop{\centering{\footnotesize\itshape\@dedicatory\@@par}%
  483.       \global\dimen@i\prevdepth}\prevdepth\dimen@i
  484.   \fi
  485.   \@setabstract
  486.   \normalsize
  487.   \if@titlepage
  488.     \newpage
  489.   \else
  490.     \dimen@34\p@ \advance\dimen@-\baselineskip
  491.     \vskip\dimen@\relax
  492.   \fi
  493. } % end \@maketitle
  494. \let\serieslogo@\@empty
  495. \def\copyrightyear{0000}
  496. \def\copyrightyearmodC{00}
  497. \def\ISSN{0000-0000}
  498. \def\copyrightprice{\$1.00\;+\;\$.25 per page}
  499. \def\currentvolume{00}
  500. \def\currentyear{19xx}
  501. \def\currentissue{00}
  502. \def\currentmonth{Xxxx}
  503. \newinsert\copyins
  504. \skip\copyins=1.5pc
  505. \count\copyins=1000 % magnification factor, 1000 = 100%
  506. \dimen\copyins=.5\textheight % maximum allowed per page
  507. \def\@setcopyright{%
  508.   \ifx\@empty\serieslogo@
  509.   \else
  510.     \insert\copyins{\hsize\textwidth
  511.       \parfillskip\z@ \leftskip\z@\@plus.9\textwidth
  512.       \fontsize{6}{7\p@}\normalfont\upshape
  513.       \everypar{}%
  514.       \vskip-\skip\copyins \nointerlineskip
  515.       \noindent\vrule\@width\z@\@height\skip\copyins
  516.       \copyright\copyrightyear\ American Mathematical Society\break
  517.       \ISSN/\copyrightyearmodC\ \copyrightprice\par
  518.       \kern\z@}%
  519.   \fi
  520. }
  521. \def\@combinefloats{%
  522.   \ifx \@toplist\@empty \else \@cflt \fi
  523.   \ifx \@botlist\@empty \else \@cflb \fi
  524.   \ifvoid\copyins \else \@cflci \fi
  525. }
  526. \def\@cflci{%
  527.   \if\if@twocolumn \if@firstcolumn F\else T\fi\else T\fi T%
  528.       \setbox\@outputbox\vbox{%
  529.         \unvbox\@outputbox
  530.         \vskip\skip\copyins
  531.         \hbox to\columnwidth{%
  532.           \hss\vbox to\z@{\vss\unvbox\copyins}}}%
  533.   \fi
  534. }
  535. \newcommand{\abstractname}{Abstract}
  536. \newcommand{\keywordsname}{Key words and phrases}
  537. \newcommand{\subjclassname}{\textup{1991} Mathematics Subject
  538.      Classification}
  539. \def\@tempb{amsart}
  540. \ifx\@classname\@tempb
  541.   \newcommand{\datename}{\textit{Date}:}
  542. \else
  543.   \newcommand{\datename}{Received by the editors}
  544. \fi
  545. \def\@settitle{\begin{center}
  546.   \baselineskip14\p@\relax
  547.     \bfseries
  548. \uppercasenonmath\@title
  549.   \@title
  550.   \end{center}%
  551. }
  552. \def\@setauthors{%
  553.   \begingroup
  554.   \trivlist
  555.   \centering\footnotesize \@topsep30\p@\relax
  556.   \advance\@topsep by -\baselineskip
  557.   \item\relax
  558.   \andify\authors
  559. \uppercasenonmath\authors
  560.   \authors
  561.   \endtrivlist
  562.   \endgroup
  563. }
  564. \def\@setdate{\datename\ \@date\@addpunct.}
  565. \def\@setsubjclass{%
  566.   {\itshape\subjclassname.}\enspace\@subjclass\@addpunct.}
  567. \def\@setkeywords{%
  568.   {\itshape \keywordsname.}\enspace \@keywords\@addpunct.}
  569. \def\@setthanks{\def\thanks##1{\par##1\@addpunct.}\thankses}
  570. \newbox\abstractbox
  571. \newenvironment{abstract}{%
  572.   \ifx\maketitle\relax
  573.     \ClassWarning{\@classname}{Abstract should precede
  574.       \protect\maketitle\space in AMS documentclasses; reported}%
  575.   \fi
  576.   \global\setbox\abstractbox=\vtop \bgroup
  577.   \normalfont\footnotesize
  578.   \advance \hsize -6pc
  579.   \trivlist \labelsep.5em\item[\hskip\labelsep
  580.     {\scshape\abstractname}.]\ignorespaces
  581. }{%
  582.   \endtrivlist
  583.   \egroup
  584.   \ifx\@setabstract\relax \@setabstracta \fi
  585. }
  586. \def\@setabstract{\@setabstracta \global\let\@setabstract\relax}
  587. \def\@setabstracta{%
  588.   \ifvoid\abstractbox
  589.   \else
  590.     \skip@20\p@ \advance\skip@-\lastskip
  591.     \advance\skip@-\baselineskip \vskip\skip@
  592.   \moveright 3pc
  593.     \box\abstractbox
  594.   \fi
  595. }
  596. \def\titlepage{%
  597.   \clearpage
  598.   \thispagestyle{empty}\setcounter{page}{0}}
  599. \def\endtitlepage{\newpage}
  600. \def\labelenumi{\theenumi.}
  601. \def\theenumi{\@arabic\c@enumi}
  602. \def\labelenumii{(\theenumii)}
  603. \def\theenumii{\@alph\c@enumii}
  604. \def\p@enumii{\theenumi}
  605. \def\labelenumiii{(\theenumiii)}
  606. \def\theenumiii{\@roman\c@enumiii}
  607. \def\p@enumiii{\theenumi(\theenumii)}
  608. \def\labelenumiv{(\theenumiv)}
  609. \def\theenumiv{\@Alph\c@enumiv}
  610. \def\p@enumiv{\p@enumiii\theenumiii}
  611. \def\labelitemi{$\m@th\bullet$}
  612. \def\labelitemii{\bfseries --}% \upshape already done by \itemize
  613. \def\labelitemiii{$\m@th\ast$}
  614. \def\labelitemiv{$\m@th\cdot$}
  615. \def\verse{\let\\\@centercr
  616.   \list{}{\itemsep\z@ \itemindent -1.5em\listparindent\itemindent
  617.   \rightmargin\leftmargin \advance\leftmargin 1.5em}\item[]}
  618. \let\endverse=\endlist
  619. \def\quotation{\list{}{%
  620.     \leftmargin3pc \listparindent\normalparindent
  621.     \itemindent\z@
  622.     \rightmargin\leftmargin \parsep\z@ \@plus\p@}%
  623.   \item[]}
  624. \let\endquotation=\endlist
  625. \def\quote{\list{}{\rightmargin\leftmargin}\item[]}
  626. \let\endquote=\endlist
  627. \def\trivlist{\parsep\parskip\@nmbrlistfalse
  628.   \@trivlist \labelwidth\z@ \leftmargin\z@
  629.   \itemindent\z@
  630.   \let\@itemlabel\@empty
  631.   \def\makelabel##1{\upshape##1}}
  632.  
  633. \def\enumerate{\ifnum \@enumdepth >3 \@toodeep\else
  634.       \advance\@enumdepth \@ne
  635.       \edef\@enumctr{enum\romannumeral\the\@enumdepth}\list
  636.       {\csname label\@enumctr\endcsname}{\usecounter
  637.         {\@enumctr}\def\makelabel##1{\hss\llap{\upshape##1}}}\fi}
  638.  
  639. \def\itemize{%
  640.   \ifnum\@itemdepth>3 \@toodeep
  641.   \else \advance\@itemdepth\@ne
  642.     \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
  643.     \list{\csname\@itemitem\endcsname}%
  644.       {\def\makelabel##1{\hss\llap{\upshape##1}}}%
  645.   \fi}
  646. \newcommand{\descriptionlabel}[1]{\hspace\labelsep \upshape\bfseries #1:}
  647. \newcommand{\description}{\list{}{%
  648.   \advance\leftmargini6\p@ \itemindent-12\p@
  649.   \labelwidth\z@ \let\makelabel\descriptionlabel}}
  650. \let\enddescription=\endlist
  651. \let\upn=\textup
  652. \AtBeginDocument{%
  653.   \settowidth\leftmargini{\labelenumi\hskip\labelsep}%
  654.   \advance\leftmargini by \normalparindent
  655.   \settowidth\leftmarginii{\labelenumii\hskip\labelsep}%
  656.   \advance\leftmarginii by 6pt
  657.   \settowidth\leftmarginiii{\labelenumiii\hskip\labelsep}%
  658.   \advance\leftmarginiii by 6pt
  659.   \settowidth\leftmarginiv{\labelenumiv\hskip\labelsep}%
  660.   \advance\leftmarginiv by 10pt
  661.   \leftmarginv=10pt
  662.   \leftmarginvi=10pt
  663.   \leftmargin=\leftmargini
  664.   \labelsep=5pt
  665.   \labelwidth=\leftmargini \advance\labelwidth-\labelsep
  666.   \@listi}
  667. \newskip\listisep
  668. \listisep\smallskipamount
  669. \def\@listI{\leftmargin\leftmargini \parsep\z@skip
  670.   \topsep\listisep \itemsep\z@skip
  671.   \listparindent\normalparindent}
  672. \let\@listi\@listI
  673. \def\@listii{\leftmargin\leftmarginii
  674.   \labelwidth\leftmarginii \advance\labelwidth-\labelsep
  675.   \topsep\z@skip \parsep\z@skip \partopsep\z@skip \itemsep\z@skip}
  676. \def\@listiii{\leftmargin\leftmarginiii
  677.   \labelwidth\leftmarginiii \advance\labelwidth-\labelsep}
  678. \def\@listiv{\leftmargin\leftmarginiv
  679.   \labelwidth\leftmarginiv \advance\labelwidth-\labelsep}
  680. \def\@listv{\leftmargin\leftmarginv
  681.   \labelwidth\leftmarginv \advance\labelwidth-\labelsep}
  682. \def\@listvi{\leftmargin\leftmarginvi
  683.   \labelwidth\leftmarginvi \advance\labelwidth-\labelsep}
  684. \def\@startsection#1#2#3#4#5#6{%
  685.  \if@noskipsec \leavevmode \fi
  686.  \par \@tempskipa #4\relax
  687.  \@afterindenttrue
  688.  \ifdim \@tempskipa <\z@ \@tempskipa -\@tempskipa \@afterindentfalse\fi
  689.  \if@nobreak \everypar{}\else
  690.      \addpenalty\@secpenalty\addvspace\@tempskipa\fi
  691.  \@ifstar{\@dblarg{\@sect{#1}{\@m}{#3}{#4}{#5}{#6}}}%
  692.          {\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}%
  693. }
  694. \def\@sect#1#2#3#4#5#6[#7]#8{%
  695.   \edef\@toclevel{\ifnum#2=\@m 0\else\number#2\fi}%
  696.   \ifnum #2>\c@secnumdepth \let\@secnumber\@empty
  697.   \else \@xp\let\@xp\@secnumber\csname the#1\endcsname\fi
  698.  \ifnum #2>\c@secnumdepth
  699.    \let\@svsec\@empty
  700.  \else
  701.     \refstepcounter{#1}%
  702.     \edef\@svsec{\ifnum#2<\@m
  703.        \@ifundefined{#1name}{}{%
  704.          \ignorespaces\csname #1name\endcsname\space}\fi
  705.        \@nx\textup{%
  706.       \@nx\mdseries
  707.          \csname the#1\endcsname.}\enspace
  708.     }%
  709.   \fi
  710.   \@tempskipa #5\relax
  711.   \ifdim \@tempskipa>\z@ % then this is not a run-in section heading
  712.     \begingroup #6\relax
  713.     \@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty\@M #8\par}%
  714.     \endgroup
  715.     \ifnum#2>\@m \else \@tocwrite{#1}{#8}\fi
  716.   \else
  717.   \def\@svsechd{#6\hskip #3\@svsec
  718.     \@ifnotempty{#8}{\ignorespaces#8\unskip
  719.        \@addpunct.}%
  720.     \ifnum#2>\@m \else \@tocwrite{#1}{#8}\fi
  721.   }%
  722.   \fi
  723.   \global\@nobreaktrue
  724.   \@xsect{#5}}
  725. \let\@ssect\relax
  726. \newcounter{part}
  727. \newcounter{section}
  728. \newcounter{subsection}[section]
  729. \newcounter{subsubsection}[subsection]
  730. \newcounter{paragraph}[subsubsection]
  731. \renewcommand\thepart          {\arabic{part}}
  732. \renewcommand\thesection       {\arabic{section}}
  733. \renewcommand\thesubsection    {\thesection.\arabic{subsection}}
  734. \renewcommand\thesubsubsection {\thesubsection .\arabic{subsubsection}}
  735. \renewcommand\theparagraph     {\thesubsubsection.\arabic{paragraph}}
  736. \setcounter{secnumdepth}{3}
  737. \def\partname{Part}
  738. \def\part{\@startsection{part}{0}%
  739.   \z@{\linespacing\@plus\linespacing}{.5\linespacing}%
  740.   {\normalfont\bfseries\raggedright}}
  741. \def\specialsection{\@startsection{section}{1}%
  742.   \z@{\linespacing\@plus\linespacing}{.5\linespacing}%
  743.   {\normalfont\centering}}
  744. \def\section{\@startsection{section}{1}%
  745.   \z@{.7\linespacing\@plus\linespacing}{.5\linespacing}%
  746.   {\normalfont\scshape\centering}}
  747. \def\subsection{\@startsection{subsection}{2}%
  748.   \z@{.5\linespacing\@plus.7\linespacing}{-.5em}%
  749.   {\normalfont\bfseries}}
  750. \def\subsubsection{\@startsection{subsubsection}{3}%
  751.   \z@{.5\linespacing\@plus.7\linespacing}{-.5em}%
  752.   {\normalfont\itshape}}
  753. \def\paragraph{\@startsection{paragraph}{4}%
  754.   \z@\z@{-\fontdimen2\font}%
  755.   \normalfont}
  756. \def\subparagraph{\@startsection{subparagraph}{5}%
  757.   \z@\z@{-\fontdimen2\font}%
  758.   \normalfont}
  759. \def\appendix{\par\c@section\z@ \c@subsection\z@
  760.    \let\sectionname\appendixname
  761.    \def\thesection{\@Alph\c@section}}
  762. \def\appendixname{Appendix}
  763. \def\@Roman#1{\@xp\@slowromancap
  764.   \romannumeral#1@}%
  765. \def\@slowromancap#1{\ifx @#1% then terminate
  766.   \else
  767.     \if i#1I\else\if v#1V\else\if x#1X\else\if l#1L\else\if
  768.     c#1C\else\if m#1M\else#1\fi\fi\fi\fi\fi\fi
  769.     \@xp\@slowromancap
  770.   \fi
  771. }
  772. \newcommand{\@pnumwidth}{1.6em}
  773. \newcommand{\@tocrmarg}{2.6em}
  774. \setcounter{tocdepth}{2}
  775. \def\@starttoc#1#2{\begingroup
  776.   \par\removelastskip\vskip\z@skip
  777.   \@startsection{}\@M\z@{\linespacing\@plus\linespacing}%
  778.     {.5\linespacing}{\centering\scshape}{#2}%
  779.   \ifx\contentsname#2%
  780.   \else \addcontentsline{toc}{section}{#2}\fi
  781.   \makeatletter
  782.   \@input{\jobname.#1}%
  783.   \if@filesw
  784.     \@xp\newwrite\csname tf@#1\endcsname
  785.     \immediate\@xp\openout\csname tf@#1\endcsname \jobname.#1\relax
  786.   \fi
  787.   \global\@nobreakfalse \endgroup
  788.   \addvspace{32\p@\@plus14\p@}%
  789.   \let\tableofcontents\relax
  790. }
  791. \def\contentsname{Contents}
  792. \def\listfigurename{List of Figures}
  793. \def\listtablename{List of Tables}
  794. \def\tableofcontents{\@starttoc{toc}\contentsname}
  795. \def\listoffigures{\@starttoc{lof}\listfigurename}
  796. \def\listoftables{\@starttoc{lot}\listtablename}
  797. \AtBeginDocument{%
  798.   \@for\@tempa:=-1,0,1,2,3\do{%
  799.     \@ifundefined{r@tocindent\@tempa}{%
  800.       \@xp\gdef\csname r@tocindent\@tempa\endcsname{0pt}}{}%
  801.   }%
  802. }
  803. \def\@writetocindents{%
  804.   \begingroup
  805.   \@for\@tempa:=-1,0,1,2,3\do{%
  806.     \immediate\write\@auxout{%
  807.       \string\newlabel{tocindent\@tempa}{%
  808.         \csname r@tocindent\@tempa\endcsname}}%
  809.   }%
  810.   \endgroup}
  811. \AtEndDocument{\@writetocindents}
  812.  
  813. \let\indentlabel\@empty
  814. \def\@tochangmeasure#1{\sbox\z@{#1}%
  815.   \ifdim\wd\z@>\csname r@tocindent\@toclevel\endcsname\relax
  816.     \@xp\xdef\csname r@tocindent\@toclevel\endcsname{\the\wd\z@}%
  817.   \fi
  818. }
  819. \def\@tocline#1#2#3#4#5#6#7{\relax
  820.   \ifnum #1>\c@tocdepth % then omit
  821.   \else
  822.     \par \addpenalty\@secpenalty\addvspace{#2}%
  823.     \begingroup \hyphenpenalty\@M
  824.     \@ifempty{#4}{%
  825.       \@tempdima\csname r@tocindent\number#1\endcsname\relax
  826.     }{%
  827.       \@tempdima#4\relax
  828.     }%
  829.     \parindent\z@ \leftskip#3\relax \advance\leftskip\@tempdima\relax
  830.     \rightskip\@pnumwidth plus1em \parfillskip-\@pnumwidth
  831.     #5\leavevmode\hskip-\@tempdima #6\relax
  832.     \hfil\hbox to\@pnumwidth{\@tocpagenum{#7}}\par
  833.     \nobreak
  834.     \endgroup
  835.   \fi}
  836. \def\@tocpagenum#1{\hss{\mdseries #1}}
  837. \def\@tocwrite#1{\@xp\@tocwriteb\csname toc#1\endcsname{#1}}
  838. \def\@tocwriteb#1#2#3{%
  839.   \begingroup
  840.     \def\@tocline##1##2##3##4##5##6{%
  841.       \ifnum##1>\c@tocdepth
  842.       \else \sbox\z@{##5\let\indentlabel\@tochangmeasure##6}\fi}%
  843.     \csname l@#2\endcsname{#1{\csname#2name\endcsname}{\@secnumber}{}}%
  844.   \endgroup
  845.   \addcontentsline{toc}{#2}%
  846.     {\protect#1{\csname#2name\endcsname}{\@secnumber}{#3}}}
  847. \def\l@section{\@tocline{1}{0pt}{1pc}{}{}}
  848. \newcommand{\tocsection}[3]{%
  849.   \indentlabel{\@ifnotempty{#2}{\ignorespaces#1 #2.\quad}}#3}
  850. \def\l@subsection{\@tocline{2}{0pt}{1pc}{5pc}{}}
  851. \let\tocsubsection\tocsection
  852. \def\l@subsubsection{\@tocline{3}{0pt}{1pc}{7pc}{}}
  853. \let\tocsubsubsection\tocsection
  854. \def\l@part{\@tocline{-1}{12pt plus2pt}{0pt}{}{\bfseries}}
  855. \let\tocpart\tocsection
  856. \def\l@chapter{\@tocline{0}{8pt plus1pt}{0pt}{}{}}
  857. \let\tocchapter\tocsection
  858. \let\tocappendix\tocchapter
  859. \def\l@figure{\@tocline{0}{3pt plus2pt}{0pt}{}{}}
  860. \let\l@table=\l@figure
  861. \def\refname{References}
  862. \def\bibname{Bibliography}
  863. \def\bibliographystyle#1{%
  864.    \if@filesw\immediate\write\@auxout
  865.     {\string\bibstyle{#1}}\fi
  866.         \def\@tempa{#1}%
  867.         \def\@tempb{amsplain}%
  868.         \def\@tempc{}%
  869.         \ifx\@tempa\@tempb
  870.                 \def\@biblabel##1{##1.}%
  871.                 \def\bibsetup{}%
  872.         \else
  873.                 \def\bibsetup{\labelsep6\p@}%
  874.         \ifx\@tempa\@tempc
  875.                 \def\@biblabel##1{}%
  876.                 \def\bibsetup{\labelwidth\z@ \leftmargin24\p@
  877.                 \itemindent-24\p@
  878.                           \labelsep\z@ }%
  879.         \fi
  880. \fi}
  881. \newenvironment{thebibliography}[1]{%
  882.   \@xp\section\@xp*\@xp{\refname}%
  883.   \normalfont\footnotesize\labelsep .5em\relax
  884.   \renewcommand\theenumiv{\arabic{enumiv}}\let\p@enumiv\@empty
  885.   \list{\@biblabel{\theenumiv}}{\settowidth\labelwidth{\@biblabel{#1}}%
  886.     \leftmargin\labelwidth \advance\leftmargin\labelsep
  887.     \usecounter{enumiv}}%
  888.   \sloppy \clubpenalty\@M \widowpenalty\clubpenalty
  889.   \sfcode`\.=\@m
  890. }{%
  891.   \def\@noitemerr{\@latex@warning{Empty `thebibliography' environment}}%
  892.   \endlist
  893. }
  894. \def\bysame{\leavevmode\hbox to3em{\hrulefill}\thinspace}
  895. \def\newblock{}
  896. \newif\if@restonecol
  897. \def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
  898.   \columnseprule\z@ \columnsep 35\p@
  899.   \twocolumn[\@xp\section\@xp*\@xp{\indexname}]%
  900.   \thispagestyle{plain}%
  901.   \let\item\@idxitem
  902.   \parindent\z@  \parskip\z@\@plus.3\p@\relax
  903.   \footnotesize}
  904. \def\indexname{Index}
  905. \def\@idxitem{\par\hangindent 2em}
  906. \def\subitem{\par\hangindent 2em\hspace*{1em}}
  907. \def\subsubitem{\par\hangindent 3em\hspace*{2em}}
  908. \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
  909. \def\indexspace{\par\bigskip}
  910. \def\footnoterule{\kern-.4\p@
  911.         \hrule\@width 5pc\kern11\p@\kern-\footnotesep}
  912. \def\@makefnmark{\hbox{$\m@th^{\@thefnmark}$}}
  913. \def\@makefntext{\indent\@makefnmark}
  914. \long\def\@footnotetext#1{\insert\footins{%
  915.   \normalfont\footnotesize
  916.   \interlinepenalty\interfootnotelinepenalty
  917.   \splittopskip\footnotesep \splitmaxdepth \dp\strutbox
  918.   \floatingpenalty\@MM \hsize\columnwidth
  919.   \@parboxrestore \parindent\normalparindent \sloppy
  920.   \edef\@currentlabel{\p@footnote\@thefnmark}%
  921.   \@makefntext{\rule\z@\footnotesep\ignorespaces#1\unskip\strut\par}}}
  922. \hfuzz=1pt \vfuzz=\hfuzz
  923. \def\sloppy{\tolerance9999 \emergencystretch 3em\relax}
  924. \setcounter{topnumber}{4}
  925. \setcounter{bottomnumber}{4}
  926. \setcounter{totalnumber}{4}
  927. \setcounter{dbltopnumber}{4}
  928. \renewcommand{\topfraction}{.97}
  929. \renewcommand{\bottomfraction}{.97}
  930. \renewcommand{\textfraction}{.03}
  931. \renewcommand{\floatpagefraction}{.9}
  932. \renewcommand{\dbltopfraction}{.97}
  933. \renewcommand{\dblfloatpagefraction}{.9}
  934. \setlength{\floatsep}{12pt plus 6pt minus 4pt}
  935. \setlength{\textfloatsep}{15pt plus 8pt minus 5pt}
  936. \setlength{\intextsep}{12pt plus 6pt minus 4pt}
  937. \setlength{\dblfloatsep}{12pt plus 6pt minus 4pt}
  938. \setlength{\dbltextfloatsep}{15pt plus 8pt minus 5pt}
  939. \setlength{\@fptop}{0pt}% removed ``plus 1fil''
  940. \setlength{\@fpsep}{8pt}% removed ``plus 2fil''
  941. \setlength{\@fpbot}{0pt plus 1fil}
  942. \setlength{\@dblfptop}{0pt}% removed ``plus 1fil''
  943. \setlength{\@dblfpsep}{8pt}% removed ``plus 2fil''
  944. \setlength{\@dblfpbot}{0pt plus 1fil}
  945. \newcommand{\fps@figure}{tbp}
  946. \newcommand{\fps@table}{tbp}
  947. \newcounter{figure}
  948. \def\captionheadfont@{\scshape}
  949. \def\captionfont@{\normalfont}
  950. \def\ftype@figure{1}
  951. \def\ext@figure{lof}
  952. \def\fnum@figure{\figurename\ \thefigure}
  953. \def\figurename{Figure}
  954. \def\figure{\@float{figure}}
  955. \let\endfigure=\end@float
  956. \newcounter{table}
  957. \def\ftype@table{2}
  958. \def\ext@table{lot}
  959. \def\fnum@table{\tablename\ \thetable}
  960. \def\tablename{Table}
  961. \def\table{\@float{table}}
  962. \let\endtable=\end@float
  963. \long\def\@makecaption#1#2{%
  964.   \setbox\@tempboxa\vbox{\color@setgroup
  965.     \advance\hsize-6pc\noindent
  966.     \captionfont@\captionheadfont@#1\@xp\@ifnotempty\@xp
  967.         {\@cdr#2\@nil}{.\captionfont@\upshape\enspace#2}%
  968.     \unskip\kern-6pc\par
  969.     \global\setbox\@ne\lastbox\color@endgroup}%
  970.   \ifhbox\@ne % the normal case
  971.     \setbox\@ne\hbox{\unhbox\@ne\unskip\unskip\unpenalty\unkern}%
  972.   \fi
  973.   \ifdim\wd\@tempboxa=\z@ % this means caption will fit on one line
  974.     \setbox\@ne\hbox to\columnwidth{\hss\kern-6pc\box\@ne\hss}%
  975.   \else % tempboxa contained more than one line
  976.     \setbox\@ne\vbox{\unvbox\@tempboxa\parskip\z@skip
  977.         \noindent\unhbox\@ne\advance\hsize-6pc\par}%
  978. \fi
  979.   \ifnum\@tempcnta<64 % if the float IS a figure...
  980.     \addvspace\abovecaptionskip
  981.     \moveright 3pc\box\@ne
  982.   \else % if the float IS NOT a figure...
  983.     \moveright 3pc\box\@ne
  984.     \nobreak
  985.     \vskip\belowcaptionskip
  986.   \fi
  987. \relax
  988. }
  989. \newskip\abovecaptionskip \abovecaptionskip=12pt \relax
  990. \newskip\belowcaptionskip \belowcaptionskip=12pt \relax
  991. \RequirePackage{amsthm}
  992. \def\@swapped#1#2{#2%
  993.   \@ifnotempty{#1}{\@addpunct{.}\quad#1\unskip}}
  994. \def\th@plain{%
  995.   \theoremnotefont{\mdseries\upshape}%
  996.   \theorempreskipamount.5\baselineskip\@plus.2\baselineskip
  997.                                     \@minus.2\baselineskip
  998.   \theorempostskipamount\theorempreskipamount
  999.   \itshape
  1000. }
  1001. \def\th@definition{%
  1002.   \theoremnotefont{\mdseries\upshape}%
  1003.   \theorempreskipamount.5\baselineskip\@plus.2\baselineskip
  1004.                                     \@minus.2\baselineskip
  1005.   \theorempostskipamount\theorempreskipamount
  1006.   \upshape
  1007. }
  1008. \def\th@remark{%
  1009.   \theoremheadfont{\itshape}% heading font bold
  1010.   \theoremnotefont{\mdseries\upshape}%
  1011.   \theorempreskipamount.5\baselineskip\@plus.2\baselineskip
  1012.                                     \@minus.2\baselineskip
  1013.   \theorempostskipamount\theorempreskipamount
  1014.   \upshape
  1015. }
  1016. \if@compatibility
  1017. \let\@newpf\proof \let\proof\relax \let\endproof\relax
  1018. \newenvironment{pf}{\@newpf[\proofname]}{\qed\endtrivlist}
  1019. \newenvironment{pf*}[1]{\@newpf[#1]}{\qed\endtrivlist}
  1020. \fi
  1021. \def\nonbreakingspace{\unskip\nobreak\ \ignorespaces}
  1022. \def~{\protect\nonbreakingspace}
  1023. \def\@biblabel#1{\@ifnotempty{#1}{[#1]}}
  1024. \def\@cite#1#2{{%
  1025.   \m@th\upshape\mdseries[{#1\if@tempswa, #2\fi}]}}
  1026. \@ifundefined{cite }{%
  1027.   \expandafter\let\csname cite \endcsname\cite
  1028.   \edef\cite{\@nx\protect\@xp\@nx\csname cite \endcsname}%
  1029. }{}
  1030. \def\fullwidthdisplay{\displayindent\z@ \displaywidth\columnwidth}
  1031. \edef\@tempa{\noexpand\fullwidthdisplay\the\everydisplay}
  1032. \everydisplay\expandafter{\@tempa}
  1033. \newcommand\seename{see also}%
  1034. \newcommand\see[2]{{\em \seename\/} #1}%
  1035. \newcommand\printindex{\@input{\jobname.ind}}%
  1036. \hyphenation{acad-e-my acad-e-mies af-ter-thought anom-aly anom-alies
  1037. an-ti-deriv-a-tive an-tin-o-my an-tin-o-mies apoth-e-o-ses
  1038. apoth-e-o-sis ap-pen-dix ar-che-typ-al as-sign-a-ble as-sist-ant-ship
  1039. as-ymp-tot-ic asyn-chro-nous at-trib-uted at-trib-ut-able bank-rupt
  1040. bank-rupt-cy bi-dif-fer-en-tial blue-print busier busiest
  1041. cat-a-stroph-ic cat-a-stroph-i-cally con-gress cross-hatched data-base
  1042. de-fin-i-tive de-riv-a-tive dis-trib-ute dri-ver dri-vers eco-nom-ics
  1043. econ-o-mist elit-ist equi-vari-ant ex-quis-ite ex-tra-or-di-nary
  1044. flow-chart for-mi-da-ble forth-right friv-o-lous ge-o-des-ic
  1045. ge-o-det-ic geo-met-ric griev-ance griev-ous griev-ous-ly
  1046. hexa-dec-i-mal ho-lo-no-my ho-mo-thetic ideals idio-syn-crasy
  1047. in-fin-ite-ly in-fin-i-tes-i-mal ir-rev-o-ca-ble key-stroke
  1048. lam-en-ta-ble light-weight mal-a-prop-ism man-u-script mar-gin-al
  1049. meta-bol-ic me-tab-o-lism meta-lan-guage me-trop-o-lis
  1050. met-ro-pol-i-tan mi-nut-est mol-e-cule mono-chrome mono-pole
  1051. mo-nop-oly mono-spline mo-not-o-nous mul-ti-fac-eted mul-ti-plic-able
  1052. non-euclid-ean non-iso-mor-phic non-smooth par-a-digm par-a-bol-ic
  1053. pa-rab-o-loid pa-ram-e-trize para-mount pen-ta-gon phe-nom-e-non
  1054. post-script pre-am-ble pro-ce-dur-al pro-hib-i-tive pro-hib-i-tive-ly
  1055. pseu-do-dif-fer-en-tial pseu-do-fi-nite pseu-do-nym qua-drat-ic
  1056. quad-ra-ture qua-si-smooth qua-si-sta-tion-ary qua-si-tri-an-gu-lar
  1057. quin-tes-sence quin-tes-sen-tial re-arrange-ment rec-tan-gle
  1058. ret-ri-bu-tion retro-fit retro-fit-ted right-eous right-eous-ness
  1059. ro-bot ro-bot-ics sched-ul-ing se-mes-ter semi-def-i-nite
  1060. semi-ho-mo-thet-ic set-up se-vere-ly side-step sov-er-eign spe-cious
  1061. spher-oid spher-oid-al star-tling star-tling-ly sta-tis-tics
  1062. sto-chas-tic straight-est strange-ness strat-a-gem strong-hold
  1063. sum-ma-ble symp-to-matic syn-chro-nous topo-graph-i-cal tra-vers-a-ble
  1064. tra-ver-sal tra-ver-sals treach-ery turn-around un-at-tached
  1065. un-err-ing-ly white-space wide-spread wing-spread wretch-ed
  1066. wretch-ed-ly Eng-lish Euler-ian Feb-ru-ary Gauss-ian
  1067. Hamil-ton-ian Her-mit-ian Jan-u-ary Japan-ese Kor-te-weg
  1068. Le-gendre Mar-kov-ian Noe-ther-ian No-vem-ber Rie-mann-ian Sep-tem-ber}
  1069. \def\calclayout{\advance\textheight -\headheight
  1070.   \advance\textheight -\headsep
  1071.   \oddsidemargin\paperwidth
  1072.   \advance\oddsidemargin -\textwidth
  1073.   \divide\oddsidemargin\tw@
  1074.   \ifdim\oddsidemargin<.5truein \oddsidemargin.5truein \fi
  1075.   \advance\oddsidemargin -1truein
  1076.   \evensidemargin\oddsidemargin
  1077.   \topmargin\paperheight \advance\topmargin -\textheight
  1078.   \advance\topmargin -\headheight \advance\topmargin -\headsep
  1079.   \divide\topmargin\tw@
  1080.   \ifdim\topmargin<.5truein \topmargin.5truein \fi
  1081.   \advance\topmargin -1truein\relax
  1082. }
  1083. \calclayout % initialize
  1084. \pagenumbering{arabic}
  1085. \pagestyle{headings}
  1086. \thispagestyle{plain}
  1087. \if@compatibility \else\endinput\fi
  1088. \def\tiny{\Tiny}
  1089. \def\defaultfont{\normalfont}
  1090. \def\rom{\textup}
  1091. \endinput
  1092. %% 
  1093. %% End of file `amsart.cls'.
  1094.